home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 687
- Top = 153
- AlphaBlendValue = 230
- BorderIcons = []
- BorderStyle = bsNone
- Caption = 'Virtual Desktop'
- ClientHeight = 151
- ClientWidth = 170
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- OldCreateOrder = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnPaint = FormPaint
- PixelsPerInch = 96
- TextHeight = 13
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 170
- Height = 151
- Align = alClient
- AutoSize = True
- Picture.Data = {<image000.gif>}
- Visible = False
- end
- object Image2: TImage
- Left = 8
- Top = 11
- Width = 70
- Height = 56
- Cursor = crHandPoint
- OnClick = Image2Click
- end
- object Image3: TImage
- Left = 91
- Top = 11
- Width = 70
- Height = 56
- Cursor = crHandPoint
- OnClick = Image3Click
- end
- object Image4: TImage
- Left = 8
- Top = 78
- Width = 70
- Height = 56
- Cursor = crHandPoint
- OnClick = Image4Click
- end
- object Image5: TImage
- Left = 91
- Top = 78
- Width = 70
- Height = 56
- Cursor = crHandPoint
- OnClick = Image5Click
- end
- object ImageEn1: TImageEn
- Left = 104
- Top = 8
- Width = 49
- Height = 41
- ParentCtl3D = False
- Visible = False
- TabOrder = 0
- PreviewFont.Charset = DEFAULT_CHARSET
- PreviewFont.Color = clWindowText
- PreviewFont.Height = -11
- PreviewFont.Name = 'MS Sans Serif'
- PreviewFont.Style = []
- end
- object ListBox1: TListBox
- Left = 640
- Top = 312
- Width = 121
- Height = 97
- ItemHeight = 13
- Items.Strings = (
- 'Show'
- 'Hide')
- TabOrder = 1
- end
- object kbTrayIcon1: TkbTrayIcon
- Hint = 'Virtual Desktop'
- Icon.Data = {<image001.ico>}
- PopupMenu = PopupMenu1
- Visible = True
- OnDoubleClick = kbTrayIcon1DoubleClick
- Left = 64
- Top = 64
- end
- object PopupMenu1: TPopupMenu
- Left = 24
- Top = 64
- object AutoShutdowninfo1: TMenuItem
- Caption = 'Show'
- OnClick = AutoShutdowninfo1Click
- end
- object CancelAutoShutdown1: TMenuItem
- Caption = 'Close'
- OnClick = CancelAutoShutdown1Click
- end
- end
- object Timer1: TTimer
- Enabled = False
- OnTimer = Timer1Timer
- Left = 80
- Top = 96
- end
- object XWinReboot1: TXWinReboot
- Operation = roLogOff
- PowerOff = True
- ForceTerminateProcesses = True
- Left = 320
- Top = 104
- end
- end
-